@强制输出
@输出名("随机短视频")
类 随机短视频:窗口
	@布局配置([[根布局=真,宽度=-1,高度=-1,纵向布局=真]])
	变量 线性布局1 : 线性布局
	@布局配置([[父布局=线性布局1,宽度=-1,@权重=1.0]])
	变量 垂直分页布局1 : 垂直分页布局
	
	变量 上个视频 : 整数 = -1
	变量 视频播放集合 : 集合
	事件 随机短视频:创建完毕()
		订阅事件()
		本对象.屏幕方向 = 1
		本对象.显示标题栏 =假
		本对象.状态栏字体黑色 = 假
		本对象.状态栏颜色 = 黑色
		本对象.导航栏颜色 = 黑色
		线性布局1.背景颜色 = 黑色
		时钟1.时钟周期 = 300
		初始化数据()
	结束 事件

	方法 短剧添加()
		提交到主线程运行(本对象)
		变量 播放布局 :短视频播放布局
		播放布局 = 创建 短视频播放布局
		播放布局.Dk播放器1.播放视频("http://7707bo.youzhongyouzai.com/live/cx_5113.flv","")
		视频播放集合.添加成员(播放布局)
		垂直分页布局1.添加页面(播放布局)
		事件 播放布局.线性布局1:被单击()
			//该事件为了防止dk播放器被单击后显示控件
		结束 事件
		结束提交到主线程()
	结束 方法

	方法 初始化数据()
		循环(i, 0, 10)
			变量 播放布局 :短视频播放布局
			播放布局 = 创建 短视频播放布局
			播放布局.Dk播放器1.播放视频("http://7707bo.youzhongyouzai.com/live/cx_5113.flv","")
			视频播放集合.添加成员(播放布局)
			垂直分页布局1.添加页面(播放布局)
			事件 播放布局.线性布局1:被单击()
				//该事件为了防止dk播放器被单击后显示控件
			结束 事件
		结束 循环
	结束 方法

	变量 当前播放页 :短视频播放布局
	事件 垂直分页布局1:页面被改变(索引 : 整数)
		当前播放页  = 视频播放集合[索引]
		如果 取反(上个视频 == -1) 则
			变量 上次播放页 :短视频播放布局 = 视频播放集合[上个视频]
			上次播放页.Dk播放器1.暂停()
		结束 如果
		假如 当前播放页.Dk播放器1.获取当前播放状态() + 1
			是 0 //播放错误
				如果 垂直分页布局1.页面总数 > 索引 则
					垂直分页布局1.显示页面(索引+1,真)
				否则
					垂直分页布局1.显示页面(索引-1,真)
				结束 如果
			是 1 //加载前
				当前播放页.Dk播放器1.开始播放()
			是 2 //开始初始化

			是 3 //初始化完成

			是 4 //播放中
			是 5 //暂停播放
				当前播放页.Dk播放器1.恢复播放()
			是 6 //播放结束，自动播放下一个，如果没有则继续添加视频
				如果 垂直分页布局1.页面总数 > 索引 则
					垂直分页布局1.显示页面(索引+1,真)
				否则
					上个视频 = 索引
					短剧添加()
				结束 如果
		结束 假如
		短剧添加()
		上个视频 = 索引
	结束 事件

	变量 时钟1 : 时钟
	事件 时钟1:周期事件()
		如果 (上个视频+1 != 0) 则
			假如 当前播放页.Dk播放器1.获取当前播放状态()+1 
				是 1
					当前播放页.Dk播放器1.开始播放()
				是 5
					当前播放页.Dk播放器1.恢复播放()
				是 6
					如果 垂直分页布局1.页面总数 > 垂直分页布局1.取当前页面索引() 则
						垂直分页布局1.显示页面(垂直分页布局1.取当前页面索引()+1,真)
					否则
						上个视频 = 垂直分页布局1.取当前页面索引()
						短剧添加()
					结束 如果
			结束 假如
		否则
			如果 当前播放页.Dk播放器1.获取当前播放状态()+1 == 2  或 当前播放页.Dk播放器1.获取当前播放状态()+1 == 3 或 当前播放页.Dk播放器1.获取当前播放状态()+1 == 4 则
				当前播放页.Dk播放器1.暂停()
			结束 如果	
		结束 如果
	结束 事件

	@虚拟方法
	方法 返回键被按下()
		时钟1.时钟周期 =0
		当前播放页.Dk播放器1.销毁()
		垂直分页布局1.移除所有组件()
		父对象.返回键被按下()
	结束 方法
	
结束 类

类 短视频播放布局 : 组件容器

	@布局配置([[根布局=真,宽度=-1,高度=-1]])
	变量 相对布局1 : 相对布局
	@布局配置([[父布局=相对布局1,宽度=-1,高度=-1,可获取焦点=假]])
	变量 Dk播放器1 : Dk播放器
	@布局配置([[父布局=相对布局1,宽度=-1,高度=-1]])
	变量 线性布局1 : 线性布局

/*
视频接口
https://api.zxz.ee/api/video/?type=

视频分类
1=甩裙系列
2=又纯又欲
3=黑白双煞
4=猫系女友
5=硬气卡点
6=微胖系列
7=安慕希系
8=帅哥系列
9=女仆系列
10=腹肌变装
11=白丝视频
12=黑丝视频
13=御姐系列
14=二次元系
15=擦玻璃系
16=蹲下变装
17=吊带系列
18=背影变装
19=火车摇系
20=完美身材
21=晴天推荐
22=你的欲梦
23=萝莉系列
24=光剑变装
25=动漫视频
26=余震系列
27=新纯系列
28=三真香系
29=原神系列
30=甜妹系列
31=漫画芋系
32=潇潇系列
33=玉足美腿
34=清纯系列
35=慢摇系列
36=萌娃系列
37=COS系列
38=周扬青系
39=周清欢系
40=安琪系列
41=清风皓月
42=杂鱼川系
43=琳铛系列
44=惠子系列
45=蛋儿系列
46=吧啦鲨系
47=Yume系列
48=Kiki系列
49=钰钰系列
50=小瑾系列
51=燕酱系列
52=桥本环菜
53=少萝系列
54=鹿婷系列
55=李逍遥系
56=空心柚七
57=菜狗系列
58=昭昭系列
59=桃桃系列
60=擦边系列
61=摇摇系列
*/
结束 类